home *** CD-ROM | disk | FTP | other *** search
/ BCI NET 2 / BCI NET 2.iso / archives / programming / misc / xref_v1.1.lha / XRef / Tools / rexx / rexxxref.asm < prev    next >
Encoding:
Assembly Source File  |  1995-01-09  |  2.7 KB  |  115 lines
  1. ;
  2. ; $PROJECT: rexxxref.library
  3. ;
  4. ; $VER: rexxxref.asm 1.1 (08.01.95)
  5. ;
  6. ; by
  7. ;
  8. ; Stefan Ruppert , Windthorststraße 5 , 65439 Flörsheim , GERMANY
  9. ;
  10. ; (C) Copyright 1995
  11. ; All Rights Reserved !
  12. ;
  13. ; $HISTORY:
  14. ;
  15. ; 08.01.95 : 001.001 : initial
  16. ;
  17.  
  18. ;---------------------------------------------------------------------------
  19.  
  20.         INCLUDE "exec/types.i"
  21.         INCLUDE "exec/libraries.i"
  22.         INCLUDE "exec/lists.i"
  23.         INCLUDE "exec/alerts.i"
  24.         INCLUDE "exec/initializers.i"
  25.         INCLUDE "exec/resident.i"
  26.         INCLUDE "libraries/dos.i"
  27.  
  28.         INCLUDE "rexxxref.i"
  29.  
  30. ;---------------------------------------------------------------------------
  31.  
  32.         XREF    _LibInit
  33.         XREF    _LibOpen
  34.         XREF    _LibClose
  35.         XREF    _LibExpunge
  36.  
  37.         XREF    _RexxCmdParser
  38.  
  39.         XREF    ENDCODE
  40.  
  41.         SECTION CODE
  42.  
  43. ;---------------------------------------------------------------------------
  44.  
  45.         XDEF    LibReserved
  46.  
  47. ;---------------------------------------------------------------------------
  48.  
  49. ; First executable location, must return an error to the caller
  50. Start:
  51.         moveq   #-1,d0
  52.         rts
  53.  
  54. ;-----------------------------------------------------------------------
  55.  
  56. ROMTAG:
  57.         DC.W    RTC_MATCHWORD           ; UWORD RT_MATCHWORD
  58.         DC.L    ROMTAG                  ; APTR  RT_MATCHTAG
  59.         DC.L    ENDCODE                 ; APTR  RT_ENDSKIP
  60.         DC.B    RTF_AUTOINIT            ; UBYTE RT_FLAGS
  61.         DC.B    VERSION                 ; UBYTE RT_VERSION
  62.         DC.B    NT_LIBRARY              ; UBYTE RT_TYPE
  63.         DC.B    0                       ; BYTE  RT_PRI
  64.         DC.L    LibName                 ; APTR  RT_NAME
  65.         DC.L    LibId                   ; APTR  RT_IDSTRING
  66.         DC.L    LibInitTable            ; APTR  RT_INIT
  67.  
  68. LibName DC.B    'rexxxref.library',0
  69. LibId   VSTRING
  70.  
  71.         CNOP    0,4
  72.  
  73. LibInitTable:
  74.         DC.L    RexxXRef_SIZEOF
  75.         DC.L    LibFuncTable
  76.         DC.L    LibDataTable
  77.         DC.L    _LibInit
  78.  
  79. V_DEF   MACRO
  80.         DC.W    \1+(*-LibFuncTable)
  81.         ENDM
  82.  
  83. LibFuncTable:
  84.         DC.W    -1
  85.         V_DEF   _LibOpen
  86.         V_DEF   _LibClose
  87.         V_DEF   _LibExpunge
  88.         V_DEF   LibReserved
  89.  
  90.         V_DEF   _RexxCmdParser
  91.  
  92.         DC.W   -1
  93.  
  94. LibDataTable:
  95.         INITBYTE   LN_TYPE,NT_LIBRARY
  96.         INITLONG   LN_NAME,LibName
  97.         INITBYTE   LIB_FLAGS,(LIBF_SUMUSED!LIBF_CHANGED)
  98.         INITWORD   LIB_VERSION,VERSION
  99.         INITWORD   LIB_REVISION,REVISION
  100.         INITLONG   LIB_IDSTRING,LibId
  101.         DC.W       0
  102.  
  103.         CNOP    0,4
  104.  
  105. ;-----------------------------------------------------------------------
  106.  
  107. LibReserved:
  108.         moveq   #0,d0
  109.         rts
  110.  
  111. ;-----------------------------------------------------------------------
  112.  
  113.         END
  114.  
  115.